home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / ASSEMBLE / H145.ZIP / ASXXXX_4.ZIP / T6800.ASM next >
Assembly Source File  |  1990-07-18  |  8KB  |  493 lines
  1.     .title    6800 Assembler Test
  2.  
  3.     dir    =    0x0033
  4.     ext    =    0x1122
  5.     offset    =    0x0044
  6.  
  7.     aba            ;1B
  8.  
  9.     adca    #0x10        ;89 10
  10.     adca    *dir        ;99 33
  11.     adca    ,x        ;A9 00
  12.     adca    offset,x    ;A9 44
  13.     adca    ext        ;B9 11 22
  14.  
  15.     adcb    #0x10        ;C9 10
  16.     adcb    *dir        ;D9 33
  17.     adcb    ,x        ;E9 00
  18.     adcb    offset,x    ;E9 44
  19.     adcb    ext        ;F9 11 22
  20.  
  21.     adc a    #0x10        ;89 10
  22.     adc a    *dir        ;99 33
  23.     adc a    ,x        ;A9 00
  24.     adc a    offset,x    ;A9 44
  25.     adc a    ext        ;B9 11 22
  26.  
  27.     adc b    #0x10        ;C9 10
  28.     adc b    *dir        ;D9 33
  29.     adc b    ,x        ;E9 00
  30.     adc b    offset,x    ;E9 44
  31.     adc b    ext        ;F9 11 22
  32.  
  33.     adda    #0x10        ;8B 10
  34.     adda    *dir        ;9B 33
  35.     adda    ,x        ;AB 00
  36.     adda    offset,x    ;AB 44
  37.     adda    ext        ;BB 11 22
  38.  
  39.     addb    #0x10        ;CB 10
  40.     addb    *dir        ;DB 33
  41.     addb    ,x        ;EB 00
  42.     addb    offset,x    ;EB 44
  43.     addb    ext        ;FB 11 22
  44.  
  45.     add a    #0x10        ;8B 10
  46.     add a    *dir        ;9B 33
  47.     add a    ,x        ;AB 00
  48.     add a    offset,x    ;AB 44
  49.     add a    ext        ;BB 11 22
  50.  
  51.     add b    #0x10        ;CB 10
  52.     add b    *dir        ;DB 33
  53.     add b    ,x        ;EB 00
  54.     add b    offset,x    ;EB 44
  55.     add b    ext        ;FB 11 22
  56.  
  57.     anda    #0x10        ;84 10
  58.     anda    *dir        ;94 33
  59.     anda    ,x        ;A4 00
  60.     anda    offset,x    ;A4 44
  61.     anda    ext        ;B4 11 22
  62.  
  63.     andb    #0x10        ;C4 10
  64.     andb    *dir        ;D4 33
  65.     andb    ,x        ;E4 00
  66.     andb    offset,x    ;E4 44
  67.     andb    ext        ;F4 11 22
  68.  
  69.     and a    #0x10        ;84 10
  70.     and a    *dir        ;94 33
  71.     and a    ,x        ;A4 00
  72.     and a    offset,x    ;A4 44
  73.     and a    ext        ;B4 11 22
  74.  
  75.     and b    #0x10        ;C4 10
  76.     and b    *dir        ;D4 33
  77.     and b    ,x        ;E4 00
  78.     and b    offset,x    ;E4 44
  79.     and b    ext        ;F4 11 22
  80.  
  81.     asla            ;48
  82.     aslb            ;58
  83.  
  84.     asl a            ;48
  85.     asl b            ;58
  86.     asl    ,x        ;68 00
  87.     asl    offset,x    ;68 44
  88.     asl    ext        ;78 11 22
  89.  
  90.     asra            ;47
  91.     asrb            ;57
  92.  
  93.     asr a            ;47
  94.     asr b            ;57
  95.     asr    ,x        ;67 00
  96.     asr    offset,x    ;67 44
  97.     asr    ext        ;77 11 22
  98.  
  99.     bita    #0x10        ;85 10
  100.     bita    *dir        ;95 33
  101.     bita    ,x        ;A5 00
  102.     bita    offset,x    ;A5 44
  103.     bita    ext        ;B5 11 22
  104.  
  105.     bitb    #0x10        ;C5 10
  106.     bitb    *dir        ;D5 33
  107.     bitb    ,x        ;E5 00
  108.     bitb    offset,x    ;E5 44
  109.     bitb    ext        ;F5 11 22
  110.  
  111.     bit a    #0x10        ;85 10
  112.     bit a    *dir        ;95 33
  113.     bit a    ,x        ;A5 00
  114.     bit a    offset,x    ;A5 44
  115.     bit a    ext        ;B5 11 22
  116.  
  117.     bit b    #0x10        ;C5 10
  118.     bit b    *dir        ;D5 33
  119.     bit b    ,x        ;E5 00
  120.     bit b    offset,x    ;E5 44
  121.     bit b    ext        ;F5 11 22
  122.  
  123.     bra    .        ;20 FE
  124.     bhi    .        ;22 FE
  125.     bls    .        ;23 FE
  126.     bcc    .        ;24 FE
  127.     bhs    .        ;24 FE
  128.     bcs    .        ;25 FE
  129.     blo    .        ;25 FE
  130.     bne    .        ;26 FE
  131.     beq    .        ;27 FE
  132.     bvc    .        ;28 FE
  133.     bvs    .        ;29 FE
  134.     bpl    .        ;2A FE
  135.     bmi    .        ;2B FE
  136.     bge    .        ;2C FE
  137.     blt    .        ;2D FE
  138.     bgt    .        ;2E FE
  139.     ble    .        ;2F FE
  140.  
  141.     bsr    .        ;8D FE
  142.  
  143.     cba            ;11
  144.  
  145.     clc            ;0C
  146.  
  147.     cli            ;0E
  148.  
  149.     clra            ;4F
  150.     clrb            ;5F
  151.  
  152.     clr a            ;4F
  153.     clr b            ;5F
  154.     clr    ,x        ;6F 00
  155.     clr    offset,x    ;6F 44
  156.     clr    ext        ;7F 11 22
  157.  
  158.     clv            ;0A
  159.  
  160.     cmpa    #0x10        ;81 10
  161.     cmpa    *dir        ;91 33
  162.     cmpa    ,x        ;A1 00
  163.     cmpa    offset,x    ;A1 44
  164.     cmpa    ext        ;B1 11 22
  165.  
  166.     cmpb    #0x10        ;C1 10
  167.     cmpb    *dir        ;D1 33
  168.     cmpb    ,x        ;E1 00
  169.     cmpb    offset,x    ;E1 44
  170.     cmpb    ext        ;F1 11 22
  171.  
  172.     cmp a    #0x10        ;81 10
  173.     cmp a    *dir        ;91 33
  174.     cmp a    ,x        ;A1 00
  175.     cmp a    offset,x    ;A1 44
  176.     cmp a    ext        ;B1 11 22
  177.  
  178.     cmp b    #0x10        ;C1 10
  179.     cmp b    *dir        ;D1 33
  180.     cmp b    ,x        ;E1 00
  181.     cmp b    offset,x    ;E1 44
  182.     cmp b    ext        ;F1 11 22
  183.  
  184.     coma            ;43
  185.     comb            ;53
  186.  
  187.     com a            ;43
  188.     com b            ;53
  189.     com    ,x        ;63 00
  190.     com    offset,x    ;63 44
  191.     com    ext        ;73 11 22
  192.  
  193.     cpx    #0x5566        ;8C 55 66
  194.     cpx    *dir        ;9C 33
  195.     cpx    ,x        ;AC 00
  196.     cpx    offset,x    ;AC 44
  197.     cpx    ext        ;BC 11 22
  198.  
  199.     daa            ;19
  200.  
  201.     deca            ;4A
  202.     decb            ;5A
  203.  
  204.     dec a            ;4A
  205.     dec b            ;5A
  206.     dec    ,x        ;6A 00
  207.     dec    offset,x    ;6A 44
  208.     dec    ext        ;7A 11 22
  209.  
  210.     des            ;34
  211.  
  212.     dex            ;09
  213.  
  214.     eora    #0x10        ;88 10
  215.     eora    *dir        ;98 33
  216.     eora    ,x        ;A8 00
  217.     eora    offset,x    ;A8 44
  218.     eora    ext        ;B8 11 22
  219.  
  220.     eorb    #0x10        ;C8 10
  221.     eorb    *dir        ;D8 33
  222.     eorb    ,x        ;E8 00
  223.     eorb    offset,x    ;E8 44
  224.     eorb    ext        ;F8 11 22
  225.  
  226.     eor a    #0x10        ;88 10
  227.     eor a    *dir        ;98 33
  228.     eor a    ,x        ;A8 00
  229.     eor a    offset,x    ;A8 44
  230.     eor a    ext        ;B8 11 22
  231.  
  232.     eor b    #0x10        ;C8 10
  233.     eor b    *dir        ;D8 33
  234.     eor b    ,x        ;E8 00
  235.     eor b    offset,x    ;E8 44
  236.     eor b    ext        ;F8 11 22
  237.  
  238.     inca            ;4C
  239.     incb            ;5C
  240.  
  241.     inc a            ;4C
  242.     inc b            ;5C
  243.     inc    ,x        ;6C 00
  244.     inc    offset,x    ;6C 44
  245.     inc    ext        ;7C 11 22
  246.  
  247.     ins            ;31
  248.  
  249.     inx            ;08
  250.  
  251.     jmp    ,x        ;6E 00
  252.     jmp    offset,x    ;6E 44
  253.     jmp    ext        ;7E 11 22
  254.  
  255.     jsr    ,x        ;AD 00
  256.     jsr    offset,x    ;AD 44
  257.     jsr    ext        ;BD 11 22
  258.  
  259.     ldaa    #0x10        ;86 10
  260.     ldaa    *dir        ;96 33
  261.     ldaa    ,x        ;A6 00
  262.     ldaa    offset,x    ;A6 44
  263.     ldaa    ext        ;B6 11 22
  264.  
  265.     ldab    #0x10        ;C6 10
  266.     ldab    *dir        ;D6 33
  267.     ldab    ,x        ;E6 00
  268.     ldab    offset,x    ;E6 44
  269.     ldab    ext        ;F6 11 22
  270.  
  271.     lda a    #0x10        ;86 10
  272.     lda a    *dir        ;96 33
  273.     lda a    ,x        ;A6 00
  274.     lda a    offset,x    ;A6 44
  275.     lda a    ext        ;B6 11 22
  276.  
  277.     lda b    #0x10        ;C6 10
  278.     lda b    *dir        ;D6 33
  279.     lda b    ,x        ;E6 00
  280.     lda b    offset,x    ;E6 44
  281.     lda b    ext        ;F6 11 22
  282.  
  283.     lds    #0x5566        ;8E 55 66
  284.     lds    *dir        ;9E 33
  285.     lds    ,x        ;AE 00
  286.     lds    offset,x    ;AE 44
  287.     lds    ext        ;BE 11 22
  288.  
  289.     ldx    #0x5566        ;CE 55 66
  290.     ldx    *dir        ;DE 33
  291.     ldx    ,x        ;EE 00
  292.     ldx    offset,x    ;EE 44
  293.     ldx    ext        ;FE 11 22
  294.  
  295.     lsla            ;48
  296.     lslb            ;58
  297.  
  298.     lsl a            ;48
  299.     lsl b            ;58
  300.     lsl    ,x        ;68 00
  301.     lsl    offset,x    ;68 44
  302.     lsl    ext        ;78 11 22
  303.  
  304.     lsra            ;44
  305.     lsrb            ;54
  306.  
  307.     lsr a            ;44
  308.     lsr b            ;54
  309.     lsr    ,x        ;64 00
  310.     lsr    offset,x    ;64 44
  311.     lsr    ext        ;74 11 22
  312.  
  313.     nega            ;40
  314.     negb            ;50
  315.  
  316.     neg a            ;40
  317.     neg b            ;50
  318.     neg    ,x        ;60 00
  319.     neg    offset,x    ;60 44
  320.     neg    ext        ;70 11 22
  321.  
  322.     nop            ;01
  323.  
  324.     oraa    #0x10        ;8A 10
  325.     oraa    *dir        ;9A 33
  326.     oraa    ,x        ;AA 00
  327.     oraa    offset,x    ;AA 44
  328.     oraa    ext        ;BA 11 22
  329.  
  330.     orab    #0x10        ;CA 10
  331.     orab    *dir        ;DA 33
  332.     orab    ,x        ;EA 00
  333.     orab    offset,x    ;EA 44
  334.     orab    ext        ;FA 11 22
  335.  
  336.     ora a    #0x10        ;8A 10
  337.     ora a    *dir        ;9A 33
  338.     ora a    ,x        ;AA 00
  339.     ora a    offset,x    ;AA 44
  340.     ora a    ext        ;BA 11 22
  341.  
  342.     ora b    #0x10        ;CA 10
  343.     ora b    *dir        ;DA 33
  344.     ora b    ,x        ;EA 00
  345.     ora b    offset,x    ;EA 44
  346.     ora b    ext        ;FA 11 22
  347.  
  348.     psha            ;36
  349.     pshb            ;37
  350.  
  351.     psh a            ;36
  352.     psh b            ;37
  353.  
  354.     pula            ;32
  355.     pulb            ;33
  356.  
  357.     pul a            ;32
  358.     pul b            ;33
  359.  
  360.     rola            ;49
  361.     rolb            ;59
  362.  
  363.     rol a            ;49
  364.     rol b            ;59
  365.     rol    ,x        ;69 00
  366.     rol    offset,x    ;69 44
  367.     rol    ext        ;79 11 22
  368.  
  369.     rora            ;46
  370.     rorb            ;56
  371.  
  372.     ror a            ;46
  373.     ror b            ;56
  374.     ror    ,x        ;66 00
  375.     ror    offset,x    ;66 44
  376.     ror    ext        ;76 11 22
  377.  
  378.     rti            ;3B
  379.  
  380.     rts            ;39
  381.  
  382.     sba            ;10
  383.  
  384.     sbca    #0x10        ;82 10
  385.     sbca    *dir        ;92 33
  386.     sbca    ,x        ;A2 00
  387.     sbca    offset,x    ;A2 44
  388.     sbca    ext        ;B2 11 22
  389.  
  390.     sbcb    #0x10        ;C2 10
  391.     sbcb    *dir        ;D2 33
  392.     sbcb    ,x        ;E2 00
  393.     sbcb    offset,x    ;E2 44
  394.     sbcb    ext        ;F2 11 22
  395.  
  396.     sbc a    #0x10        ;82 10
  397.     sbc a    *dir        ;92 33
  398.     sbc a    ,x        ;A2 00
  399.     sbc a    offset,x    ;A2 44
  400.     sbc a    ext        ;B2 11 22
  401.  
  402.     sbc b    #0x10        ;C2 10
  403.     sbc b    *dir        ;D2 33
  404.     sbc b    ,x        ;E2 00
  405.     sbc b    offset,x    ;E2 44
  406.     sbc b    ext        ;F2 11 22
  407.  
  408.     sec            ;0D
  409.  
  410.     sei            ;0F
  411.  
  412.     sev            ;0B
  413.  
  414.     staa    *dir        ;97 33
  415.     staa    ,x        ;A7 00
  416.     staa    offset,x    ;A7 44
  417.     staa    ext        ;B7 11 22
  418.  
  419.     stab    *dir        ;D7 33
  420.     stab    ,x        ;E7 00
  421.     stab    offset,x    ;E7 44
  422.     stab    ext        ;F7 11 22
  423.  
  424.     sta a    *dir        ;97 33
  425.     sta a    ,x        ;A7 00
  426.     sta a    offset,x    ;A7 44
  427.     sta a    ext        ;B7 11 22
  428.  
  429.     sta b    *dir        ;D7 33
  430.     sta b    ,x        ;E7 00
  431.     sta b    offset,x    ;E7 44
  432.     sta b    ext        ;F7 11 22
  433.  
  434.     sts    *dir        ;9F 33
  435.     sts    ,x        ;AF 00
  436.     sts    offset,x    ;AF 44
  437.     sts    ext        ;BF 11 22
  438.  
  439.     stx    *dir        ;DF 33
  440.     stx    ,x        ;EF 00
  441.     stx    offset,x    ;EF 44
  442.     stx    ext        ;FF 11 22
  443.  
  444.     suba    #0x10        ;80 10
  445.     suba    *dir        ;90 33
  446.     suba    ,x        ;A0 00
  447.     suba    offset,x    ;A0 44
  448.     suba    ext        ;B0 11 22
  449.  
  450.     subb    #0x10        ;C0 10
  451.     subb    *dir        ;D0 33
  452.     subb    ,x        ;E0 00
  453.     subb    offset,x    ;E0 44
  454.     subb    ext        ;F0 11 22
  455.  
  456.     sub a    #0x10        ;80 10
  457.     sub a    *dir        ;90 33
  458.     sub a    ,x        ;A0 00
  459.     sub a    offset,x    ;A0 44
  460.     sub a    ext        ;B0 11 22
  461.  
  462.     sub b    #0x10        ;C0 10
  463.     sub b    *dir        ;D0 33
  464.     sub b    ,x        ;E0 00
  465.     sub b    offset,x    ;E0 44
  466.     sub b    ext        ;F0 11 22
  467.  
  468.     swi            ;3F
  469.  
  470.     tab            ;16
  471.  
  472.     tap            ;06
  473.  
  474.     tba            ;17
  475.  
  476.     tpa            ;07
  477.  
  478.     tsta            ;4D
  479.     tstb            ;5D
  480.  
  481.     tst a            ;4D
  482.     tst b            ;5D
  483.     tst    ,x        ;6D 00
  484.     tst    offset,x    ;6D 44
  485.     tst    ext        ;7D 11 22
  486.  
  487.     tsx            ;30
  488.  
  489.     txs            ;35
  490.  
  491.     wai            ;3E
  492.  
  493.